Apple Reference & Presen…tion Library 2 (Reseller)/Apple R&P Lib Reseller v2.0.iso/4-Fonts & Software/Demo Software/AppMaker/Demo AppMaker™/Demo AppMaker™.rsrc/TmpC_209_ModalOneShot.txt

Text File | 1989-04-09 | 928b | 2 lines

# (decoded with TMPL 13671)
/* %filename% -- Modal one-shot dialog *//* Created %date% %time% by AppMaker */%If MPW%#include <Types.h>#include <Quickdraw.h>#include <Controls.h>#include <Dialogs.h>#include <Events.h>#include <Lists.h>#include <Menus.h>#include <TextEdit.h>%end if%#include "ResourceDefs.h"#include "DialogAids.h"#include "%unitname%.h"#define nil            0L%ConstItems%%If MPW%#pragma segment %unitname%%end if% %ItemProcs%%MaybeFilter%/*----------*/void Get%dlogname% (%dlogname%)%dlogname%Rec%    %*%dlogname%;{    DialogPtr    theDialog;    short        itemNr;    register %dlogname%Ptr    info;    InitCursor ();    theDialog = GetNewDialog (%dlogname%ID, nil, (WindowPtr) -1L);    SetPort (theDialog);    info = %dlogname%;    %SetItems%    ShowWindow (theDialog);    ModalDialog (%Filtername%, &itemNr);    switch (itemNr) {    %HandleItems%    } /*case*/    %FinishItems%    DisposDialog (theDialog);} /*Get%dlogname%*/